home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 32 / CD Expert nº 32.iso / Army Men TiS / data1.cab / Required_Files / rules / killer.txt < prev    next >
Text File  |  1999-10-08  |  3KB  |  86 lines
  1. //////////////////////////////////////////////////////////////////////////////
  2. // Section common to all game types
  3. //////////////////////////////////////////////////////////////////////////////
  4. include common.txt
  5. include ffire.txt
  6.  
  7. //////////////////////////////////////////////////////////////////////////////
  8. // Killer specific section
  9. //////////////////////////////////////////////////////////////////////////////
  10.  
  11. variable killEnemySargeBonus 250
  12.  
  13. // in killer the black flag is an additional strategic item
  14. if startup1 then
  15.     deploy bkflagbase,
  16.     deploy blackflag1,
  17.     setitemflag blackflag1 strategic 1,
  18.     setitemflag blackflag1 stratsquare 1
  19.  
  20. // @1 = color killed, @2 = Capitalized color (e.g. "Green"), @3 = color of killer
  21. macro killed_sarge 3
  22. {
  23.     if killed @1sarge1 by @3 testvar isAlly @3 @1 = 0 and hasitem @3sarge1 blackflag1 = 1 then
  24.         showmessage "@2 sarge killed by killer @3",
  25.         trigger @3KilledEnemySarge
  26. }
  27.  
  28. // @1 = color, @2 = Capitalized color (e.g. "Green"), @3-5 are other colors
  29. macro killer_macro 5
  30. {
  31.     // in killer the enemy sarges should be shown on the stratmap
  32.     if startup1 testvar iscoloringame @1 > 0 then
  33.         setitemflag @1sarge1 strategic 1
  34.  
  35.     // check for the @1 sarge being killed and who killed them
  36.     expand killed_sarge ( @1 "@2" @3 )
  37.     expand killed_sarge ( @1 "@2" @4 )
  38.     expand killed_sarge ( @1 "@2" @5 )
  39.  
  40.     // killer scoring events
  41.  
  42.     if @1KilledEnemySarge then
  43.         addvar @1score killEnemySargeBonus,
  44.         playsound "mp_death.wav" (0,0) 1 2,
  45.         trigger check@1wins
  46.  
  47.     // check the flag being picked up so we can show a message and make a sound
  48.  
  49.     if pickedup blackflag1 by @1sarge1 then
  50.         showmessage "@2 is the killer",
  51.         playsound "mp_gotflag.wav" (0,0) 3 1,
  52.         addscoresymbol @1 flag
  53.  
  54.     if dropped blackflag1 by @1sarge1 then
  55.         removescoresymbol @1 flag
  56. }
  57.  
  58. expand killer_macro ( green "Green" tan   blue  grey  )
  59. expand killer_macro ( tan   "Tan"   green blue  grey  )
  60. expand killer_macro ( blue  "Blue"  green tan   grey  )
  61. expand killer_macro ( grey  "Grey"  green tan   blue  )
  62.  
  63. // if flag is dropped and not picked up for 2 minutes then return it to it's base
  64.  
  65. variable flagTimeOutVar 0
  66. variable flagLastTimeOutVar 1
  67.  
  68. if dropped blackflag1 then
  69.     triggerdelay 120000 flagCheckTimeOut
  70.  
  71. if pickedup blackflag1 then
  72.     addvar flagTimeOutVar 1
  73.  
  74. if flagCheckTimeOut testvar flagTimeOutVar = flagLastTimeOutVar then
  75.     showmessage "Black Flag was dropped and not picked up for 2 minutes - moved to base",
  76.     createexplosion blackflag1 128 0 green,
  77.     playsound "mp_rebaseflag.wav" 0 1,
  78.     moveitem blackflag1 bkflagbase,
  79.     triggerdelay 1000 flagLastTimeOutIncr
  80.  
  81. if flagCheckTimeOut testvar flagTimeOutVar <> flagLastTimeOutVar then
  82.     triggerdelay 1000 flagLastTimeOutIncr
  83.  
  84. if flagLastTimeOutIncr then
  85.     addvar flagLastTimeOutVar 1
  86.